home *** CD-ROM | disk | FTP | other *** search
/ Internet 53 / INTERNET53.iso / pc / software / windows / building / homesite evaluation / data1.cab / HS_Wizards / HTML / QuickStart.wml < prev    next >
Encoding:
Text File  |  1998-10-08  |  1.1 KB  |  35 lines
  1. <WIZSET tMetaRefresh = "">
  2. <WIZIF ParameterExists('RefreshTime')>
  3. <WIZIF Trim(RefreshTime) neq ''>
  4.     <WIZSET tMetaRefresh = "\n" & DefaultCase("<META HTTP-EQUIV=""REFRESH"" CONTENT=""") & RefreshTime>
  5.     <WIZIF Trim(RefreshURL) neq ''>
  6.         <WIZSET tMetaRefresh = tMetaRefresh & DefaultCase("; URL=") & RefreshURL>
  7.     </WIZIF>
  8.     <WIZSET tMetaRefresh = tMetaRefresh & """>">
  9. </WIZIF>
  10. </WIZIF>
  11.  
  12. <WIZSET tMetaKeywords = "">
  13. <WIZIF ParameterExists('Keywords')>
  14. <WIZIF Trim(Keywords) neq ''>
  15.     <WIZSET tMetaKeywords = "\n" & DefaultCase("<META HTTP-EQUIV=""KEYWORDS"" CONTENT=""") & Keywords & """>">
  16. </WIZIF>
  17. </WIZIF>
  18.     
  19. <WIZSET tMetaDescription = "">
  20. <WIZIF ParameterExists('Description')>
  21. <WIZIF Trim(Description) neq ''>
  22.     <WIZSET tMetaDescription = "\n" & DefaultCase("<META HTTP-EQUIV=""DESCRIPTION"" CONTENT=""") & Description & """>">
  23. </WIZIF>
  24. </WIZIF>
  25.  
  26. $${DocType}
  27.  
  28. <$${DefaultCase("HTML")}>
  29. <$${DefaultCase("HEAD")}>
  30. <$${DefaultCase("TITLE")}>$${Title}</$${DefaultCase("TITLE")}>$${tMetaRefresh}$${tMetaKeywords}$${tMetaDescription}
  31. </$${DefaultCase("HEAD")}>
  32. <$${DefaultCase("BODY")}>
  33.  
  34. </$${DefaultCase("BODY")}>
  35. </$${DefaultCase("HTML")}>